GNU APL Reference Card 


(for GNU APL version 1.8) 


Use C-x gnu-apl to start GNU APL in Emacs. 


Emacs mode 


Interaction mode: 


beginning of defun 
end of defun 

find function at point 
apropos symbol 

edit function 

show help for symbol 
finnapl list 

show keyboard 

plot line 

edit variable 

trace 


Edit mode: 


go to beginning of defun 
go to end of defun 

find function at point 
apropos symbol 
interactive send current function 
help for symbol 

finnapl list 

show keyboard 
interactive send buffer 
interactive send region 
switch to interactive 
trace 

indent 


System 
Notation for commands: 


F filename L_ library 
G logging facility 0 object 
W workspace 

APL standard commands 


check workspace intergity 

clear workspace 

save workspace as CONTINUE and exit 
copies objects from given workspace 
remove W 

dump W (readable, HTML escaped) 
dump W (readable APL) 

dump W (readable APL, verbose) 
erase symbol(s) 

show functions 

help 

history 

runs command on host 


PO Oe OO Qa aa 
=aaaqaaqaagaaqgaaanas: 


P path 
S symbol 


) CHECK 

) CLEAR 

) CONTINUE 

)copy [L] w [o...] 
)DROP [L] W 
)DUMP-HTML [[L] Ww] 
)DUMP [[L] W] 
)DUMPV [[L] Ww] 
JERASES ... 
)FNS [from-to] 
)HELP [primitive] 
)HIST [CLEAR] 
)HOST command ... 


loads workspace (IBM .atf format) 
show libraries and paths 

show saved workspaces 

load workspace W 

show more error info 

lists symbols matching name 

quit APL 

show operators 

dump workspace (IBM .atf format) 
protects during copying 

protects during loading 

quiet load 

reset state indicator 

save workspace as W 

clear suspended functions 

see suspended functions and locals 
see suspended functions 

state indicator 

show symbol count 

show values in use by interpreter 
show variables 

get /set workspace ID 


)INF [O...] 
)LIBS [[L] path] 
)LIB [LIP] [from-to] 
)LOAD [L] W 

) MORE 

)NMS [from-to] 

) OFF 

)OPS [from-to] 
)OUT name [0...] 
)PcoPY [L] W [O...] 
)PIN F [0...] 
)QLOAD [[L] w] 

) RESET 

)SAVE [[L] W] 
)SIC 

)SINL 

)SIS 

)SI 

)SYMBOLS [count] 
) VALUES 

)VARS [from-to] 
)WSID [Ww] 


GNU extension commands (mostly for debugging) 


toggles boxing of values when printing 
toggle colored output 

dump W in HTML file 

expected error count in test suite 
help 

show keyboard layout 

as )LIB, but shows fil eextensions 
show/set logging facilities 

next testcase file 

performance statistics 

as )SIS, with more details 

as )SI, with more details 

shared variables 

describe internal details of symbol S 
define user command 

toggle output coloring on console 


System variables: 


]BOXING [OFF |num] 
]COLOR [ON| OFF] 
]DOXY [path] 
JEXPECT error_count 
]HELP [primitive] 
]KEYB 

JLIB [L|P] [from-to] 
]LOG [G [ON|OFF]] 


] NEXTFILE 

]PSTAT [CLEAR|SAVE] 
]sIs 

]sI 

]SVARS 

]SYMBOL S 


]JUSERCMD [... ] 
]XTERM [ON| OFF] 


character input/output [ 
evaluated input/output 

account information AI 
command line arguments ARG 
atomic vector AV 
comparison tolerance CT 
event message EM 
event type ET 
format control FC 
index origin (indexes start: 1, can be set to 10 
0) 

eft argument L 
ine counters LC 
atent expression (executed when workspace LX 
is loaded) 

print precision (number of digits) PP 
print style PS 
print width (max characters in each printed PW 
ine) 


right argument R 
random link RL 
shared variable event SVE 
system limits SYL 
terminal control characters TC 
time stamp (current time) TS 
time zone (offset from GMT) TZ 
user load UL 
axis argument xX 
workspace available (bytes for workspace) WA 
dfn axis argument X 

dfn result r 

dfn left value arg Qa 

dfn left function arg Qa 

dfn right value arg w 

dfn right function arg w 
System functions: 

atomic function AF 
attributes AT 
char representation CR 
delay DL 
D. Knuth’s dancing links DLX 
execute alternate EA 
execute both EB 
execute controlled EC 
environment ENV 
event simulate ES 
expunge EX 
fast Fourier transform FFT 
file I/O FIO 
Fix (FFI/call native functions) FX 
Gtk GUI GTK 
MAP ravel elements MAP 
input from script INP 
name association NA 
name class NC 
name list NL 
plot a graph PLOT 
regular expression, regex |_|RE string RE 
random APL value RVAL 
state indicator SI 
SQL functions SQL 
shared variable control svc 
shared variable offer svo 
shared variable query SvQ 
shared variable retraction SVR 
shared variable state svs 
STOP vector STOP 
transfer form TF 
TRACE vector TRACE 
unicode character UCS 
Notation 

comment A 

statement separator ° 
assignment At ... 
assignment (ABC)t ......... 


function definition 


zilde (empty vector) 
a 

a+b 

-a 

a-b 

magnitude of a 
b mod a 

signal (-1, 0, +1) 
ab 

1/a 

a/b 

floor of a 
min(a,b) 

ceiling of a 
max(a,b) 

et 


a? 


log(a) 
logy (a) 
first n non-negative integers 


a=b 

a<b 

a>b 

a<b 

a>b 

expression max depth 
match (value and type) 
expression min depth 
not match 

not a 

aor b 

a and b 

a nor b 

anand b 

aéb? 

find a in b (binary index) 
bitwise a or b 

bitwise a and b 
bitwise a nor b 
bitwise a nand b 
bitwise a # b 

bitwise a = b 


al 


circle (trig) function 
random integer in [1,a] 
a distinct random integers in [1,b] 


makes a vector out of A 
append B to A 
number of components in each dimen- 


sion of A 
array with shape A and data elements 


B 
inverse matrix of A 


coo Too 
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B—1A (solution to Br = A) 

reverse elements of A (15* index) 
rotate B by A positions 

reverse elements of A (last index) 
rotate B by A positions (last index) 
drop first A elements of B 

select first A elements of B 
intersection 

set (remove duplicates) 

union 

identity 

take right hand side (B) 

take left(X; =0) or right(X; =1) 
null 

take left hand side (A) 

i-th element of A 

elements of A with indices i, j, k, .. 
element of A w/indices i, j, ... in 1 
dimension, k, 1, ... in second, ... 


st 


transpose of A 

transpose of B, axes ordered by A 
maps A: 1 for a€ B, 0 for a¢ B 

grade up A 

grade up B with elements of A as top 
priority 

grade down A 

grade down B with elements of A as 
low priority 

transpose of A 

enclose A 

enclose B with selected elements given 


the binary vector A 
disclose A 


recursively pick elements of B given 
the indices in A 


Decode single digits of B with respect 


to baseA ; 
Encode B with respect to bases given 


by A 


line label A 
branch to line A 


execute APL expression A 
format A as chars 


user input 


system var/function 


reduce op over array A 

compress: select B using A as mask 
A/B on last dimension 

expand: insert zeros in B using A as 


mask 

A\B on last dimension 

inner product with functions f, g 
outer product with function f 
for each bEB, apply: Ab 


OA 
OA 


op/A 
A/B 
A/B 
A\B 


AXB 
Af .gB 
Ao.fB 
A’B 


rank: apply left operand function to A fok B 


cells specified by array on right 
axis: AfC, over Bth axis Af [B]C 


commute 1-x over array A 1—AA 


CR, DOFIO, DPLOT, oSQL 


When called with an empty string as right argument, these will 
show a table with all their possible uses. 


Circle function 


A AoB A AoB 


0 V1-BXxXB 


~1~ arcsin B 1 sin B 

~2 ~~ arccos B vs cos B 

~3 arctan B a tan B 

—4 1/—1+BxB 4 V/1+B xX B 

—5  arcsinh B 5 sinh B 

—6  arccosh B 6 cosh B 

—7  arctanh B 7 tanh B 

8 — (80B) 8 +1/—1+BxB 
~9 B 9 real part of B 
~10 +B 10 |B 

~11 0J1xB ; 11 imag part of B 
—12 *0J1xB (e*?) 12 arc B (phase of B) 


For A= 8, the sign before the square root is opposite of B. 


Function Definition 


Example: f(d,v) = (uo? feet vf) Wa 
Dynamic function definition (dfn): 

a is the left argument, w is the right argument. 
f£< { ( +/wta ) * (+a) } 

Traditional function definition (tradfn): 


V: begin/end defun. “VR < A f B ;U ;V” is “f takes left arg 
A, right arg B, has local vars U, V, and returns result in R”. 


Vres + dfv 3;8q ;sum 
sqi-vx¥*d 
sum «+ +/sq 


res ¢ sum*(+d) 


V 
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